home *** CD-ROM | disk | FTP | other *** search
/ Wayzata's Best of Shareware PC/Windows 1 / Wayzata's Best of Shareware for PC-Windows - Release 1 - Wayzata Technology (1993).iso / mac / ZIPPED / DOS / GRAPHICS / VIVID20.ZIP / CLIP9.V < prev    next >
Text File  |  1992-03-15  |  1KB  |  63 lines
  1.  
  2. //      clip3.v -- test out new clipping planes with rings, polygons
  3.  
  4. #include color.vc
  5.  
  6. studio {
  7.     from 1 -6 5
  8.     at 0 0 .5
  9.     up 0 0 1
  10.     angle 30
  11.     res 80 50
  12.     antialias quick
  13.     aspect 4/3
  14.     background {
  15.         greys.map
  16.     }
  17.     ambient white * .2
  18. }
  19.  
  20. light {
  21.     type point
  22.     falloff 0
  23.     position 1 -.5 5
  24.     color white * .5
  25. }
  26. light {
  27.     type point
  28.     falloff 0
  29.     position -2 -4 5
  30.     color white * .5
  31. }
  32.  
  33. //      base surface
  34.  
  35. surface {
  36.     diff plum * .5          // dark plum
  37. }
  38. ring { center 0 0 0 normal 0 0 1 radius 1000 }
  39.  
  40. //      clip rings
  41.  
  42. surf {
  43.     diff 0 .5 1
  44.     shine 20 white
  45. }
  46.  
  47. //      5 rings with same cliping plane
  48.  
  49. global_clip {
  50.     clip { center 0 0 .5 normal -1 1 -2 }
  51.     clip { center 0 0 .9 radius 1 inside }
  52. }
  53.  
  54. ring { center 0 0 0.1 normal 0 0 1 min_radius .3 max_radius 1 }
  55. ring { center 0 0 0.3 normal 0 0 1 min_radius .3 max_radius 1 }
  56. ring { center 0 0 0.5 normal 0 0 1 min_radius .3 max_radius 1 }
  57. ring { center 0 0 0.7 normal 0 0 1 min_radius .3 max_radius 1 }
  58. ring { center 0 0 0.9 normal 0 0 1 min_radius .3 max_radius 1 }
  59.  
  60. clip_pop
  61.  
  62.  
  63.